home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / dev / basic / NewCommandSet.lha / NewCommandSet_V1.80 / Install next >
Text File  |  1999-03-27  |  2KB  |  117 lines
  1. ;*
  2. ;* Install Script For NewCommandSet V1.70
  3. ;*  
  4. ;* Done By -> AlphaSOUND <-
  5. ;*
  6.  
  7. (complete 0)
  8.  
  9. ;*** Directory Select ***
  10.  
  11. (complete 10)
  12.  
  13. (set DestDir
  14.   (askdir
  15.     (prompt "Where is localized your BlitzLibs drawer ?")
  16.     (help "")
  17.     (default "BlitzLibs:")
  18.   )
  19. )
  20.  
  21. (set DestDir (expandpath DestDir))
  22. (set NDir (tackon DestDir "NLibs"))
  23.  
  24.  
  25. (set ExampleDir
  26.   (askdir
  27.     (prompt "Where do you want to install the examples files ?"
  28.             "An drawer 'NExamples will be created here.")
  29.     (help "")
  30.     (default "Blitz2:")
  31.   )
  32. )
  33.  
  34.  
  35. (set HelpDir
  36.   (askdir
  37.     (prompt "Where do you want to install the help files ?"
  38.             "An drawer 'NHelp' will be created here.")
  39.     (help "")
  40.     (default "Blitz2:")
  41.   )
  42. )
  43.  
  44. (set HelpDir (expandpath HelpDir))
  45. (set HDir (tackon HelpDir "NHelp"))
  46.  
  47. (set ExampleDir (expandpath ExampleDir))
  48. (set EDir (tackon ExampleDir "NExamples"))
  49.  
  50. (makedir NDir)
  51. (makedir HDir (infos))
  52. (makedir EDir)
  53.  
  54. (complete 50)
  55.  
  56. (copyfiles
  57.   (source "Resident")
  58.   (dest DestDir)
  59.   (pattern "AmigaLibs.res")
  60. )
  61.  
  62. (complete 60)
  63.  
  64. (copyfiles
  65.   (source "NLibs")
  66.   (dest NDir)
  67.   (pattern "#?.obj")
  68. )
  69.  
  70.  
  71. (complete 80)
  72.  
  73. (copyfiles
  74.   (source "Examples")
  75.   (dest EDir)
  76.   (pattern "#?.bb2#?")
  77. )
  78.  
  79.  
  80. (complete 90)
  81.  
  82. (copyfiles
  83.   (source "NHelp")
  84.   (dest HDir)
  85.   (pattern "#?")
  86. )
  87.  
  88. (complete 100)
  89.  
  90. (set RunMake (askbool (prompt
  91.  
  92.               "\nThank you to let give a try to this new library set.\n\n"
  93.  
  94.               "The installation is complete and you must now launch the MAKEDEFLIBS program "
  95.               "which is located in your BlitzLibs: drawer.\n\n"
  96.  
  97.               "I can do it for you. Click on 'Run It' to run the MAKEDEFLIBS program or on"
  98.               "'Skip' to skip this part.\n\n"
  99.  
  100.               "Have fun with theses libraries !\n\n"
  101.  
  102.               "Fred -> AlphaSOUND <-")
  103.  
  104.               (help "")
  105.               (choices "Run it !"
  106.                        "Skip it !"
  107.               )
  108.              )
  109. )
  110.  
  111.  
  112. (if (= 1 RunMake)
  113. (
  114.     (working "Makedeflibs is being to update your deflibs...")
  115.     (run ("BlitzLibs:MakeDefLibs"))
  116. ))
  117.